"0","```r
plot(H~site.longlats$Longitude, pch=16, xlab=\"Longitude\")
plot(S.obs~site.longlats$Longitude, pch=16, xlab=\"Longitude\")
```"
"0","```r
plot(Simp~site.longlats$Longitude, pch=16, xlab=\"Longitude\")
plot(H_even~site.longlats$Longitude, pch=16, xlab=\"Longitude\")
```"
